home *** CD-ROM | disk | FTP | other *** search
/ Power Programmierung / Power-Programmierung (Tewi)(1994).iso / access / cdinstal / workgrp.in_ < prev    next >
INI File  |  1993-06-07  |  2KB  |  76 lines
  1. [WorkGroup Path Dialog]
  2.     GetPathMessBoxTitle = $(AppName)" Arbeitsgruppe angeben"
  3.     GetPathMessBoxText  = "Ihre Eingabe ist kein qualifizierter und/oder gⁿltiger DOS-Pfadname."
  4.     GetNameBoxText  = "Sie mⁿssen alle EintrΣge ausfⁿllen."
  5.     GetSysMdaErr = "Die Datei SYSTEM.MDA konnte auf dem angegebenen Pfad nicht gefunden werden."
  6.     SYSMDAFILE = "system.mda"
  7.     CODEPAGE = "04E4"
  8.     LANGUAGE = "0407"            ; windows language code, need to be localized
  9.  
  10. [System Paths]
  11.      WINDOWSPATH     =  "" ? DETCMD.DLL GetWindowsDir
  12.  
  13. [Shell Commands]
  14.     set    Title = "Microsoft Access-Arbeitsgruppe wechseln"
  15.     set-title       $(Title)        
  16.     ui start LanManNetWork
  17.  
  18.  
  19.     ifstr $(STF_MODE) != "WORKGRP"
  20.         exit
  21.     endif
  22.  
  23.     read-syms "Custom"
  24.     detect          "System Paths"
  25.     set CIRPATH = $(STF_SRCDIR)
  26.     read-syms "WorkGroup Path Dialog"
  27.  
  28. MainDlg = +
  29.     ui start "ChangeWorkGrp"
  30.  
  31.     ifstr $(DLGEVENT) == "BACK"
  32.         ui start "GetWorkgrpString"
  33.         set EditTextIn = $(SYSMDAPATH)
  34.         ui start "ChangeWorkGrpPath"
  35.         ifstr $(DLGEVENT) == "EXIT"
  36.             ui pop 1
  37.             goto "MainDlg"
  38.         endif
  39.         ui pop 1
  40.         set SYSMDAPATH = $(EditPathOut)
  41.         set SYSMDAPATH2 = $(EditTextOut)  ;possible UNC
  42.     else-ifstr $(DLGEVENT) == "EXIT"
  43.         exit
  44.     else
  45.         ui start "GetNameOrgPin"
  46.         ifstr $(DLGEVENT) == "EXIT"
  47.             ui pop 1
  48.             goto "MainDlg"
  49.         endif
  50.         ui pop 1
  51.         ui start "CREATEDB"
  52.     endif
  53.     ui pop 1
  54.     install "Update INIs"
  55.     exit
  56.  
  57. [Update INIs]
  58.     RemoveIniKey, $(WINDOWSPATH)"MSACCESS.INI", "Options", "SystemDB"
  59.     CreateIniKeyValue, $(WINDOWSPATH)"MSACCESS.INI", "Options", "SystemDB", $(SYSMDAPATH2)$(SYSMDAFILE), O
  60.     Exit
  61.  
  62. [Custom]
  63.     IniFileName = "msaccess.ini"
  64.  
  65. [Source Media Descriptions]
  66.     0 = "Alte Dateien l÷schen", TAGFILE = "msajt100.dll"
  67.     1 = "Diskette 1 - Setup", TAGFILE = "1.wmf"
  68.     2 = "Diskette 2", TAGFILE = "2.wmf"
  69.     3 = "Diskette 3", TAGFILE = "3.wmf"
  70.     4 = "Diskette 4", TAGFILE = "4.wmf"
  71.     5 = "Diskette 5", TAGFILE = "5.wmf"
  72.     6 = "Diskette 6", TAGFILE = "6.wmf"
  73.     7 = "Diskette 7", TAGFILE = "7.wmf"
  74.     8 = "Diskette 8", TAGFILE = "8.wmf"
  75.     9 = "ODBC-Diskette", TAGFILE = "9.wmf"
  76.